## packages
library(readr)
library(purrr)
library(NLMR)
library(raster)
library(here)
## path + folder for generated landscapes
dir_lscps <- here("data", "simulated", "landscapes")
if (!dir.exists(dir_lscps)) dir.create(dir_lscps, recursive = TRUE)The 4th Dimension of Movement
Landscapes (simulated tracks)
Preparation
Simulation Environmental Variables
frac <- c(0.01, 0.1, 1)
r <- 2e3
reps <- 10
set.seed(221)
## elevation (numeric) and habitat (categorical)
if (!file.exists(paste0(dir_lscps, "/", reps, "/cat.rds"))) {
for (i in 1:reps) {
dir.create(paste0(dir_lscps, "/", i), showWarnings = FALSE)
cont <- map(frac, ~ {
x <- nlm_fbm(r, r, fract_dim = .x)
crs(x) <- "epsg:3035"
names(x) <- "var1"
x
})
cat <- map(frac, ~ {
x <- nlm_fbm(r, r, fract_dim = .x) > 0.5
crs(x) <- "epsg:3035"
names(x) <- "var2"
x
})
saveRDS(cont, paste0(dir_lscps, "/", i, "/cont.rds"))
saveRDS(cat, paste0(dir_lscps, "/", i, "/cat.rds"))
}
} else {
cont <- read_rds(paste0(dir_lscps, "/", reps, "/cont.rds"))
cat <- read_rds(paste0(dir_lscps, "/", reps, "/cat.rds"))
}
## homing tendency (hr)
if (!file.exists(paste0(dir_lscps, "/", reps, "/d.rds"))) {
d <- raster(terra::distance(terra::rast(cat[[1]]), terra::vect(cbind(r/2, r/2), crs = "epsg:3035")))
names(d) <- "d"
saveRDS(d, paste0(dir_lscps, "/hr.rds"))
} else {
d <- read_rds(paste0(dir_lscps, "/hr.rds"))
}
|---------|---------|---------|---------|
=========================================
Visualize Landscapes
plot(stack(cont))
plot(stack(cat))
plot(d)
Session Info
git2r::repository()Local: main /Users/cedric/My Drive/Work/DataViz/Clients/2024_IZW_Support/Signer_TempRes
Remote: main @ origin (https://github.com/EcoDynIZW/Signer_TempRes.git)
Head: [44e43f5] 2025-02-24: clean-up plot dirsdevtools::session_info()─ Session info ───────────────────────────────────────────────────────────────
setting value
version R version 4.4.2 (2024-10-31)
os macOS Ventura 13.6.4
system aarch64, darwin20
ui X11
language (EN)
collate en_US.UTF-8
ctype en_US.UTF-8
tz Europe/Berlin
date 2025-02-26
pandoc 3.2 @ /Applications/RStudio.app/Contents/Resources/app/quarto/bin/tools/aarch64/ (via rmarkdown)
─ Packages ───────────────────────────────────────────────────────────────────
package * version date (UTC) lib source
cachem 1.0.8 2023-05-01 [1] CRAN (R 4.4.0)
class 7.3-22 2023-05-03 [1] CRAN (R 4.4.2)
classInt 0.4-10 2023-09-05 [1] CRAN (R 4.4.0)
cli 3.6.3 2024-06-21 [1] CRAN (R 4.4.0)
codetools 0.2-20 2024-03-31 [1] CRAN (R 4.4.2)
DBI 1.2.3 2024-06-02 [1] CRAN (R 4.4.0)
devtools 2.4.5 2022-10-11 [1] CRAN (R 4.4.0)
digest 0.6.35 2024-03-11 [1] CRAN (R 4.4.0)
e1071 1.7-14 2023-12-06 [1] CRAN (R 4.4.0)
ellipsis 0.3.2 2021-04-29 [1] CRAN (R 4.4.0)
evaluate 0.23 2023-11-01 [1] CRAN (R 4.4.0)
fansi 1.0.6 2023-12-08 [1] CRAN (R 4.4.0)
fastmap 1.1.1 2023-02-24 [1] CRAN (R 4.4.0)
fs 1.6.4 2024-04-25 [1] CRAN (R 4.4.0)
git2r 0.35.0 2024-10-20 [1] CRAN (R 4.4.1)
glue 1.8.0 2024-09-30 [1] CRAN (R 4.4.1)
here * 1.0.1 2020-12-13 [1] CRAN (R 4.4.0)
hms 1.1.3 2023-03-21 [1] CRAN (R 4.4.0)
htmltools 0.5.8.1 2024-04-04 [1] CRAN (R 4.4.0)
htmlwidgets 1.6.4 2023-12-06 [1] CRAN (R 4.4.0)
httpuv 1.6.15 2024-03-26 [1] CRAN (R 4.4.0)
jsonlite 1.8.8 2023-12-04 [1] CRAN (R 4.4.0)
KernSmooth 2.23-24 2024-05-17 [1] CRAN (R 4.4.2)
knitr 1.46 2024-04-06 [1] CRAN (R 4.4.0)
later 1.3.2 2023-12-06 [1] CRAN (R 4.4.0)
lattice 0.22-6 2024-03-20 [1] CRAN (R 4.4.2)
lifecycle 1.0.4 2023-11-07 [1] CRAN (R 4.4.0)
magrittr 2.0.3 2022-03-30 [1] CRAN (R 4.4.0)
memoise 2.0.1 2021-11-26 [1] CRAN (R 4.4.0)
mime 0.12 2021-09-28 [1] CRAN (R 4.4.0)
miniUI 0.1.1.1 2018-05-18 [1] CRAN (R 4.4.0)
NLMR * 1.1.1 2024-06-20 [1] Github (ropensci/NLMR@29d9708)
pillar 1.9.0 2023-03-22 [1] CRAN (R 4.4.0)
pkgbuild 1.4.4 2024-03-17 [1] CRAN (R 4.4.0)
pkgconfig 2.0.3 2019-09-22 [1] CRAN (R 4.4.0)
pkgload 1.3.4 2024-01-16 [1] CRAN (R 4.4.0)
profvis 0.3.8 2023-05-02 [1] CRAN (R 4.4.0)
promises 1.3.0 2024-04-05 [1] CRAN (R 4.4.0)
proxy 0.4-27 2022-06-09 [1] CRAN (R 4.4.0)
purrr * 1.0.2 2023-08-10 [1] CRAN (R 4.4.0)
R6 2.5.1 2021-08-19 [1] CRAN (R 4.4.0)
ragg 1.3.2 2024-05-15 [1] CRAN (R 4.4.0)
RandomFields 3.3.14 2022-01-18 [1] Github (cran/RandomFields@41d603e)
RandomFieldsUtils 1.2.5 2022-04-19 [1] Github (cran/RandomFieldsUtils@b754335)
raster * 3.6-26 2023-10-14 [1] CRAN (R 4.4.0)
Rcpp 1.0.12 2024-01-09 [1] CRAN (R 4.4.0)
readr * 2.1.5 2024-01-10 [1] CRAN (R 4.4.0)
remotes 2.5.0 2024-03-17 [1] CRAN (R 4.4.0)
rlang 1.1.4 2024-06-04 [1] CRAN (R 4.4.0)
rmarkdown 2.26 2024-03-05 [1] CRAN (R 4.4.0)
rprojroot 2.0.4 2023-11-05 [1] CRAN (R 4.4.0)
rstudioapi 0.16.0 2024-03-24 [1] CRAN (R 4.4.0)
sessioninfo 1.2.2 2021-12-06 [1] CRAN (R 4.4.0)
sf 1.0-16 2024-03-24 [1] CRAN (R 4.4.0)
shiny 1.8.1.1 2024-04-02 [1] CRAN (R 4.4.0)
sp * 2.1-4 2024-04-30 [1] CRAN (R 4.4.0)
stringi 1.8.4 2024-05-06 [1] CRAN (R 4.4.0)
stringr 1.5.1 2023-11-14 [1] CRAN (R 4.4.0)
systemfonts 1.1.0 2024-05-15 [1] CRAN (R 4.4.0)
terra 1.7-78 2024-05-22 [1] CRAN (R 4.4.0)
textshaping 0.4.0 2024-05-24 [1] CRAN (R 4.4.0)
tibble 3.2.1 2023-03-20 [1] CRAN (R 4.4.0)
tzdb 0.4.0 2023-05-12 [1] CRAN (R 4.4.0)
units 0.8-5 2023-11-28 [1] CRAN (R 4.4.0)
urlchecker 1.0.1 2021-11-30 [1] CRAN (R 4.4.0)
usethis 2.2.3 2024-02-19 [1] CRAN (R 4.4.0)
utf8 1.2.4 2023-10-22 [1] CRAN (R 4.4.0)
vctrs 0.6.5 2023-12-01 [1] CRAN (R 4.4.0)
xfun 0.49 2024-10-31 [1] CRAN (R 4.4.1)
xtable 1.8-4 2019-04-21 [1] CRAN (R 4.4.0)
yaml 2.3.8 2023-12-11 [1] CRAN (R 4.4.0)
[1] /Library/Frameworks/R.framework/Versions/4.4-arm64/Resources/library
──────────────────────────────────────────────────────────────────────────────